module Main where

import Generics.MultiRec.Base
import Generics.MultiRec.Show as G
import Language.Java.Parser (java,alexScanTokens)
import Generics.MultiRec.Languages.Java

main = do
  src <- readFile "example.java"
  let p = java $ alexScanTokens src
  print p
  print "\n\n parse OK \n\n"
  print $ G.show TheProgram p
  return ()
